Namespace BAL.Servicio
    Public Class Reserva
        Public Function Reservar(ByVal _Reserva As BEL.Servicio.Reserva, ByVal _Parametros As Object()) As System.Boolean
            Dim _dal As New DAL.Servicio.Reserva
            Return _dal.Reservar(_Reserva, _Parametros)
        End Function
		Public Function Listar(ByVal _Parametros As Object()) As DataTable
			Dim _dal As New DAL.Servicio.Reserva
			Return _dal.Listar(_Parametros)
		End Function
        Public Function ListarReservasActivas(ByVal _Parametros As Object()) As DataTable
            Dim _dal As New DAL.Servicio.Reserva
            Return _dal.Listar(_Parametros)
        End Function
		Public Function ValidaCapacidad(ByVal _Parametros() As Object) As Boolean
			Dim _dal As New DAL.Servicio.Reserva
			Return _dal.ValidaCapacidad(_Parametros)
		End Function
		Public Function ValidaSocio(ByVal _Parametros() As Object) As Boolean
			Dim _dal As New DAL.Servicio.Reserva
			Return _dal.ValidaSocio(_Parametros)
		End Function
		Public Function Imprimir(ByVal _Parametros As Object()) As DataTable
			Dim _dal As New DAL.Servicio.Reserva
			Return _dal.Imprimir(_Parametros)
		End Function
		Public Function ListarPersonal() As DataTable
			Dim _dal As New DAL.Servicio.Reserva
			Return _dal.ListarPersonal()
		End Function
        Public Function ListarServicios() As DataTable
            Dim _dal As New DAL.Servicio.Reserva
            Return _dal.ListarServicios()
        End Function
    End Class
End Namespace